From: Kenichi Handa Date: Wed, 26 Feb 1997 11:53:15 +0000 (+0000) Subject: (bookmark-jump-noselect): Use goto-char instead of X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~81996 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=c5536f37a6f05293d291df4c380a350cfaaa9ce8;p=emacs.git (bookmark-jump-noselect): Use goto-char instead of forward-char/backward-char to pay attention to multibyte characters.. --- diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 36bb94464bb..5d4b86ca388 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -1114,10 +1114,10 @@ of the old one in the permanent bookmark record." ;; rather than after and remain perhaps unaware of the changes. (if forward-str (if (search-forward forward-str (point-max) t) - (backward-char (length forward-str)))) + (goto-char (match-beginning 0)))) (if behind-str (if (search-backward behind-str (point-min) t) - (forward-char (length behind-str)))) + (goto-char (match-end 0)))) ;; added by db (setq bookmark-current-bookmark str) (cons (current-buffer) (point)))